COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	SETMAG2 25.6 <SETS NCHNS, SRATE, MAG, SPEED
C00005 ENDMK
C⊗;
SETMAG;2 25.6; <SETS NCHNS, SRATE, MAG, SPEED;

INSTRUMENT FL1A;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;END;
INSTRUMENT FL1B;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;END;
INSTRUMENT FL1C;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;END;
INSTRUMENT FL1D;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;END;
INSTRUMENT FL2A;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTB←OUTB+U2;END;
INSTRUMENT FL2B;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTB←OUTB+U2;END;
INSTRUMENT FL2C;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTB←OUTB+U2;END;
INSTRUMENT FL2D;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTB←OUTB+U2;END;

INSTRUMENT VNA;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3/4*MAG,P6);
OUTA←OUTA+U2*.7;
OUTB←OUTB+U2*.4;END;
INSTRUMENT VNB;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3/4*MAG,P6);
OUTA←OUTA+U2*.7;
OUTB←OUTB+U2*.4;END;
INSTRUMENT VNC;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3/4*MAG,P6);
OUTA←OUTA+U2*.7;
OUTB←OUTB+U2*.4;END;
INSTRUMENT VND;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3/4*MAG,P6);
OUTA←OUTA+U2*.7;
OUTB←OUTB+U2*.4;END;

INSTRUMENT VAA;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2*.4;
OUTB←OUTB+U2*.7;END;

INSTRUMENT VAB;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2*.4;
OUTB←OUTB+U2*.7;END;

INSTRUMENT VAC;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2*.4;
OUTB←OUTB+U2*.7;END;

INSTRUMENT VAD;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2*.4;
OUTB←OUTB+U2*.7;END;